<?php
session_start();
header('Content-Type: text/html; charset=UTF-8');
include_once ('../Libreria/fpdf17/fpdf.php');
include_once ('../controlador_bd/CConexion.php');

//echo $_POST['paciente_res'];
$codigopa = $_POST['paciente_res'];
$codigoexa = $_POST['examen'];
$numerore = $_POST['resul_res'];
$codigoOrden = $_POST['orden_res'];
$fechaorden = $_POST['fecha_res'];

// Creación del objeto de la clase heredada

class PDF extends FPDF {
	// Cabecera de página
	function Header() {
		// Logo hizquierdo
		$this -> Image('../Imagen/logo.png', 4, 6, 40);
		// Logo derecho
		$this -> Image('../Imagen/horario.png', 160, 6, 50);
		// Arial bold 15
		$this -> SetFont('Times', 'BI', 15);
		// Movernos a la derecha
		//$this->Cell(80);
		// Título
		$this -> Cell(null, null, utf8_decode('Laboratorio Clinico de Diagnóstico'), 10, 5, 'C');
		// Salto de línea
		$this -> Ln(5);
		//$this->Cell(80);
		$this -> SetFont('Arial', '', 10);
		$this -> Cell(null, null, 'Calidad y Responsabilidad nos distinguen', 10, 5, 'C');
		$this -> Ln(5);
		$this -> SetFont('Arial', 'BI', 15);
		$this -> Cell(null, null, '"JERACHRIS"', 10, 5, 'C');
		$this -> Ln(5);
		$this -> SetFont('Arial', '', 10);
		$this -> Cell(null, null, utf8_decode('Lic. Marina Graciela Márquez de Gómez'), 10, 5, 'C');
		$this -> Ln(5);
		$this -> Cell(null, null, 'J.V.P.L No. 1199', 10, 5, 'C');
		$this -> Ln(5);
		$this -> Cell(null, null, 'Laboratorio: Urb. El Matazano No. 3, Calle Principal Casa #88 ', 10, 5, 'C');
		$this -> Ln(5);
		$this -> Cell(null, null, '(Valle Nuevo) Soyapango, una cuadra antes de la Unidad de Salud de Santa Lucia', 10, 5, 'C');
		$this -> Ln(5);
		$this -> Cell(null, null, 'Ruta de Buses 29-A', 10, 5, 'C');
		$this -> Ln(5);
		//Imprimiendo Linea
		$this -> Cell(null, null, '', 1, 5);
		$this -> SetRightMargin(25);
		$this -> SetLeftMargin(25);

	}

	// Pie de página
	function Footer() {
		// Posición: a 1,5 cm del final
		$this -> SetY(-35);
		// Arial italic 8
		$this -> SetFont('Arial', 'I', 10);
		$this -> Cell(0, 10, utf8_decode('Lic. Marina Graciela Márquez de Gómez'), 0, 0, 'C');
		$this -> Ln(5);
		$this -> Cell(0, 10, utf8_decode('Licenciada en Laboratorio Clínico'), 0, 0, 'C');
		$this -> Ln(5);
		$this -> Cell(0, 10, 'J.V.P.L No. 1199', 10, 5, 'C');
		//$this -> Ln(5);
		// Número de página
		$this -> SetFont('Arial', 'I', 10);
		$this -> Cell(0, 10, utf8_decode('Página ' . $this -> PageNo() . '/{nb}'), 0, 0, 'R');
	}

}

$objconec = new CConexion();
$objconec -> conectar();

$consultaExa = "SELECT 
		  paciente.nombrepa ||' '||paciente.apellidopa as nombre,
		  paciente.sexopa,
		  date_part('year', age(paciente.fechanac))as edad,
		  paciente.telefonopa,
		  examen.nombreexa
		
		FROM 
		  public.paciente, 
		  public.resultado, 
		  public.ordendeexamen, 
		  public.examen
		WHERE 
		  paciente.codigopa = resultado.codigopa AND
		  resultado.codigopa = ordendeexamen.codigopa AND
		  resultado.codigoorden = ordendeexamen.codigoorden AND
		  ordendeexamen.codigopa = paciente.codigopa AND
		  examen.codigoexa = ordendeexamen.codigoexa AND
		  ordendeexamen.pendiente = 'false' AND
		  paciente.codigopa='" . $codigopa . "'  AND
		  ordendeexamen.codigoorden='" . $codigoOrden . "' AND
		  examen.codigoexa='" . $codigoexa . "' AND
		  ordendeexamen.fechaorden='" . $fechaorden . "' AND
		  resultado.numerore ='" . $numerore . "';";

$pgConsultaExa = pg_query($consultaExa);
$mirow = pg_fetch_array($pgConsultaExa);
$cuentamifila = pg_num_rows($pgConsultaExa);

if ($cuentamifila == 0) {
	echo "Error no hay datos \n Filas: " . $cuentamifila;
} else {
	$pdf = new PDF('P', 'mm', 'Letter');
	$pdf -> AliasNbPages();
	//$pdf -> SetRightMargin(30);
	$pdf -> AddPage();
	$pdf -> SetFont('Arial', '', 10);
	$pdf -> Ln(5);
	$pdf -> Cell(0, 0, 'Paciente: ' . utf8_decode($mirow[0]), 0, 1);
	$pdf -> SetFont('Arial', '', 10);
	//$pdf -> Ln(5);
	if ($mirow[2] < 1) {
		$con = "select date_part('month', age(fechanac))as edad
				from paciente 
				where codigopa='DS201301';";
		$pgcon = pg_query($con);
		$pgfetchcon = pg_fetch_array($pgcon);

		$pdf -> Cell(0, 0, utf8_decode('Edad: ' . $pgfetchcon['edad'] . ' meses'), 10, 5, 'C');

	} else {
		$pdf -> Cell(0, 0, utf8_decode('Edad: ' . $mirow['edad'] . ' años'), 10, 5, 'C');
		//$pdf -> Ln(5);
	}
	//$pdf -> Ln(5);
	if ($mirow[1] == 'M') {
		$pdf -> Cell(0, 0, 'Sexo: Masculino', 10, 5, 'R');

	} else {
		$pdf -> Cell(0, 0, 'Sexo: Femenino', 10, 5, 'R');
	}
	$pdf -> Ln(5);
	$pdf -> Cell(0, 0, 'Telefono: ' . $mirow[3], 10, 5);
	$pdf -> Ln(5);
	//Imprimiendo Linea
	$pdf -> Cell(0, 0, '', 1, 0, 'C');
	$pdf -> Ln(5);
	$consulta = "select 
					valn.nameval,valn.valor,valo.valoro, t1.observaciones
					from 
						resultado t1, valor_obtenido as valo  left join valornormal as valn on valo.id_valornormal=valn.id_valornormal 
				   where 
				   		valo.numerore=" . $numerore . " AND t1.numerore='" . $numerore . "'
				   order by valn.id_valornormal asc;";

		$resultado = pg_query($consulta);
		$fila = pg_fetch_array($resultado);
		$numcol = pg_num_fields($resultado);
		$numfila = pg_num_rows($resultado);
	if ($numfila == 0) {
		$consulta = "select 
			t6.observaciones
		from 
			paciente t1, 
			ordendeexamen t2, 
			examen t5, 
			resultado t6
		where
			t1.codigopa= t2.codigopa and 
			t6.codigopa=t2.codigopa and 
			t1.codigopa=t6.codigopa and 
			t5.codigoexa='" . $codigoexa . "'   and 
			t6.numerore='" . $numerore . "'   and 
			t2.pendiente='false' and 
			t2.codigoorden = '" . $codigoOrden . "' and 
			t2.fechaorden='" . $fechaorden . "';";

		$resultado = pg_query($consulta);
		$fila = pg_fetch_array($resultado);
		$pdf -> SetFont('Helvetica', 'B', 10);
		$pdf -> Cell(0, 0, utf8_decode('Examen prácticado: ' . utf8_decode(strtoupper($mirow['nombreexa']))), 10, 5, 'C');
		$pdf -> Ln(5);
		$pdf -> SetFont('Arial', '', 10);
		$pdf -> Cell(0, 0, 'Observaciones: ' . $fila['observaciones'], 0, 1);

	} else {
		// $consulta = "select
		// t1.nombrepa ||' ' || t1.apellidopa as nombrecompleto,
		// t1.telefonopa,
		// t6.numerore,
		// t4.nameval,
		// t4.valor,
		// t3.valoro,
		// date_part('year', age(fechanac))as edad,
		// t1.sexopa,
		// t5.nombreexa,
		// t6.observaciones
		// from
		// paciente t1,
		// ordendeexamen t2,
		// valor_obtenido t3,
		// valornormal t4,
		// examen t5,
		// resultado t6
		// where
		// t1.codigopa = '" . $codigopa . "' AND
		// t1.codigopa=t2.codigopa and
		// t2.codigoorden = '" . $codigoOrden . "' AND
		// t2.codigoorden=t6.codigoorden and
		// t1.codigopa=t6.codigopa and
		// (t1.sexopa=t4.sexo or t4.sexo='I') and
		// t5.codigoexa = '" . $codigoexa . "' AND
		// t5.codigoexa=t4.codigoexa and
		// t6.numerore = '" . $numerore . "' AND
		// t6.numerore=t3.numerore and
		// t4.id_valornormal=t3.id_valornormal and
		// t2.pendiente='false' and
		// t2.fechaorden='" . $fechaorden . "'
		// order by t4.nameval asc;";

		$consulta = "select 
					valn.nameval,valn.valor,valo.valoro, t1.observaciones
					from 
						resultado t1, valor_obtenido as valo  left join valornormal as valn on valo.id_valornormal=valn.id_valornormal 
				   where 
				   		valo.numerore=" . $numerore . " AND t1.numerore='" . $numerore . "'
				   order by valn.id_valornormal asc;";

		$resultado = pg_query($consulta);
		$fila = pg_fetch_array($resultado);
		$numcol = pg_num_fields($resultado);
		$numfila = pg_num_rows($resultado);

		if ($numfila == 0) {
			echo "Error no hay datos";
			// echo $numfila . " codigopa:" . $codigopa . " codorden:" . $codigoOrden . " Codigoexa:" . $codigoexa . " numerore: " . $numerore . " fechasolicitud: " . $fechaorden;
		} else {
			// Creación del objeto de la clase heredada

			$pdf -> SetFont('Helvetica', 'B', 10);
			$pdf -> Cell(0, 0, utf8_decode('Examen prácticado: ' . utf8_decode(strtoupper($mirow['nombreexa']))), 10, 5, 'C');

			$pdf -> SetFont('Times', 'B', 10);
			$pdf -> Ln(10);

			//$pdf -> Cell(40);
			$pdf -> Cell(0, 0, 'Nomenclatura', 0, 1);
			$pdf -> Cell(0, 0, 'Resultado ', 0, 1, 'C');
			$pdf -> Cell(0, 0, 'Referencia ', 0, 1, 'R');
			$pdf -> Ln(8);
			//Imprimiendo Linea
			//$pdf -> Cell(0, 0, '', 1, 0,'C');

			/*
			 *Imprimir tabla con resultados y datos de referencia
			 */
			// $Y_Table_Position = 65;
			// //$pdf -> MultiCell($w, $h, $txt)
			$pdf -> SetFont('Arial', '', 10);
			$i = 0;

			while ($i < $numfila) {

				$row = pg_fetch_row($resultado, $i);
				$pdf -> Cell(0, 0, utf8_decode($row[0]), 0, 1);
				$pdf -> Cell(0, 0, utf8_decode($row[2]), 0, 1, 'C');
				$pdf -> Cell(0, 0, utf8_decode($row[1]), 0, 1, 'R');
				$i++;
				$pdf -> Ln(5);
			}

			$pdf -> Ln(15);
			$pdf -> Cell(0, 0, 'Observaciones: ' . $fila['observaciones'], 0, 1);

			$pdf -> Ln(5);
		}
		/*
		 *
		 */
	}
	//$pdf -> SetFont('Arial', '', 10);
	$objconec -> desconectar();
	$pdf -> Output('Resultado de ' . $mirow['nombre'] . '.pdf', 'D');
}
?>